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IDENTIFICATION 

PRODUCT CODE: AC-E926B-MC 
PRODUCT NAME: CXADBBO AD-11* MODULE 

PRODUCT DATES SEPTEMBER 1978 

MAINTAINER: DEC/X11 SUPPORT GROUP 

THE INFORMATION IN THTS DOCUMENT IS SUBJECT TO CHANGE 
HT TROUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT 
MAY APPEAR IN THIS MANUAL. 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER 
SYSTEM AND CAN BE COPIED (WITH INCLUSION OF DIGITALS 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
OTHERWISE BE PROVIDED IN WRITING BY DIGITAL. 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 
THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 

NOT SUPPLIED BY DIGITAL. 

COPYRIGHT (C) 1976,1978 DIGITAL EQUIPMENT CORPORATION 
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1*0 ABSTRACT 



ADB IS AM IOMOD THAT EXERCISES THE AD11K AMOLOG MODULE* THIS 

MODULE REQUIRES ONLY AN ANOLOG GROUND ON CHANNEL ZERO IN ORDER TO 

BE RUN* HOWEVER; WITH SPECIAL SETUP* MORE OPTIONS CAN BE CHOSEN* 

ONE OPTION IS THE USE OF THE KW11K (DUAL REAL TIME CLOCK) DEVICE. 

THIS OPTION ALLOWS EXERCISING THE AD UK ASSYNCRONUS WITH THE 

PDP-11 CPU, THAT IS* ADUK CONVERSIONS WILL BE STARTED AT RANDOM 

TIMES TO ALLOW FOR MAXIMUM BUS NOISE DURING THE CONVERSION. IF 

THIS OPTION IS SELECTED* YOU MUST DESELECT THE MODULE !CWD FROM A DEC/X11 

RUN. WITH NORMAL OPERATION, RMS NOISE AND PEAK NOISE ARE SAMPLED 

ON CHANNEL ZERO AND COMPARED AGAINST A LIMIT. WITH THE SECOND 

OPERATION OPTION, MORE CHANNELS MAY BE SPECIFIED TO RUN THE NOTSF 

TESTS ON. THE THIRD OPTION ALLOWS FOR SAMPLING OF ONE TO ALL THE 

CHANNELS OF THE ADUK. A CHECK IS MADE TO SEE THAT THE INPUT 

VOLTAGE REMAINS STABLE WITHIN AN ALLOWED TOLERANCE. LOCATIONS 

WITHING THIS MODULE TO CHANGE ANY LIMIT* OR TO FORCE TYPEOUT OF 

ANY VALUE. 



2.0 REQUIREMENTS 

HARDWARE: ONE ADUK 

ONE WRAPAROUND MODULE (OPTIONAL) 
ONE KWUK (OPTIONAL) 



storage:: adb requires: 

1. DECIMAL WORDS: 881 
OCTAL WORDS: 1561 
OCTAL BYTES: 3342 



I: 



3.0 PASS DEFINITION 

ONE PASS OF THE ADB MODULE CONSISTS OF GENERATING 8244( DECIMAL) 
INTERRUPTS (CONVERSIONS). 



4.0 EXECUTION TIME 



ONE PASS OF THE ADB MODULE RUNNING ALONG TAKES APPROXIMATELY ONE 
MINUTE. 
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5.0 CONFIGURATION REQUIREMENTS 
DEFAULT PARAMETERS: 

DEV ADR: 170400, VECTORS 340, BR1: 6 
DEVCNT: 1„ SRl: 
REQUIRED PARAMETERS: 
HOME IP SR1=1 

TP SRI BITS 1 2=1 THEN SEE OPERATION OPTIONS 

6.0 DEVICE/OPTION SETUP 

SR1=000 AN ANOLOG GROUND MUST BE PAT ON CH« 0* 

SRI 8IT0=1 THE KW11K OPTION MUST BE CONNECTED 

TO THE AD11K OPTION. 

SRI BIT1=1 ALL CHANNELS SPECIFIED MUST HAVE 

AN ANOLOG GROUND. 

7.0 MODULE OPERATION 

1. (START) BIT EXERCISE CSR 

2. SET TEST CHANNEL TO ZERO 

3- (RESTRT) PREFORM RMS NOISE CHECK ON SPECIFIED CHANNEL. 

CADRMSll 

WE FIRST USE SAR TO FIND THE DAC VALUE THAT PRODUCES A 16/84 
SPLIT FOR THE LEFT BOUNDARY OF NOISE. THEN WE USE SAR TO 
FIND THE DAC VALUE THAT PRODUCES A 84/16 SPLIT FOR THE RIGHT 
X4J , H£*«,«J i lL»J5l£ .H? T 8& CT „ THE TWO DAC VALUES AND WE HAVE A 
VALUE FOR THE 68% AREA OF NOISE (RMS). IT IS THEN COMARED 
AGAINST THE ALLOWED LIMIT TO SEE IF EXCESSIVE NOISE TS ON THE 
CHANNEL. 

4. (ADPK1) PREFORM PEAK NOISE CHECK ON SPECIFIED CHANNEL. 
9. (ADPK1) THIS IS A PEAK NOISE TEST. 

WE FIRST USE SAR TO FIND THE DAC VALUE THAT PRODUCES A .6% 
SPLIT FOR THE LEFT BOUNDARY OF NOISE. THEN WE USE SAR TO 
FIND THE DAC VALUE THAT PRODUCES A .6% SPLIT FOR THE RIGHT 
BOUNDARY. WE THEN SUBTRACT THE TWO DAC VALUES AND WE HAVE A 



a, 
# 
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SEQ 0004 



VALUE OF 98% AREA OF NOISE CPE IK). IT IS THEM COMPARED 
AGAINST TBS ALLOWED LIMIT TO SEE IF EXCESSIVE NOISE IS ON THE 
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CHANNEL. 



5* IF MULTIPLE CHANNELS ARE SELECTED FOR NOISE TESTING TEST NEXT 
CHANNEL*- IF SINGULAR RSTESf CHAN* 0* 

6. IF MOLT I -CHANNEL SAMPLING IS SELECTED* TAKE SAMPLES ON EACH 
CHANNEL SPECIFIED* AND COMPARE THE AVERAGE OF THE SAMPLES 
AGAINST THE OLD AVERAGE FOR THE CHANNEL, IF THE DIFFERENCE 
IS GREATER THAN THE TOLERANCE* REPORT THE DATA ON THAT 
CHANNEL* 

7. REPORT END PASS. 

3. (SAR) SAR IS A SUCCESSIVE APPROXIMATION ROUTINE. IT IS USED 
TO FIND A DAC VALUE THAT PRODUCES A DESIRED SPLIT. IT DOES 
THIS BY TRYING A DAC VALUE AND TAKING 512 CONVERSIONS ON THE 
A/D. IF THE AMOUNT OF THE SAMPLES IS LOWER THEN SPECIFIED IT 
INCREASES THE DAC VALUE, IF THE AMOUNT OF SAMPLES IS HIGHER 
THEN SPECIFIED, IT DECREASES THE DAC VALUE. IF THE END DAC 
VALUE IS EITHER 000 OR 377 HE HAVE A w MARPAROUND ,, ERROR, 
THIS OCCURS WHEN »E ARE UNABLE TO ADJUST THE DAC TO PRODUCE I 
DESIRED SPLIT, AND INDICATES EXCESSIVE NOISE ON A CHANNEL. 

9. (RANDY) THIS IS A RANDOM NUMBER GENERATOR. IF THE KW11X 
CLOCK OPTION IS SELECTED WE GET THE NUMBER THAT ME PUT INTO 
THE CLOCK PRESET REGISTER FROM THIS ROUTINE. 
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8,0 OPERATIONS OPTIONS 

1. VALID SRI VALUES 

SRI BIT ENABLE/DISABLE FUNCTION 

I NHIBTT USE OF CLOCK OPTION* 

1 ENABLE USE OF CLOCK OPTION. NOTES IF 

ENABLED, YOU MUST DESELECT KWOA FROM 
DEC/X11 RUN, 

1 INHIBIT SAMPLING OTHER CHANNELS FOR 

STABLE INPUT. 

1 1 ENABLE SAMPLING CHANNEL ZERO THROUGH 

CHANNEL SPECIFIED BY CLSTCH (164) FOR STABLE 
INPUT (♦-) TOLERANCE SPECIFIED BY OFF ALL (170) 

2 USE CHANNEL ZERO ONLY FOR NOISE TESTING. 

2 1 USE CHANNEL ZERO THROUGH THE CHANNEL 

SPECIFIED IN NLSTCH (166) FOR NOISE TESTING. 

2. THE FOLLOWING ARE LOCATIONS WITHIN THIS MODULE THAT ENABLE 
THE USER TO CHANGE LIMITS AND SPECIFY CHANNELS, 

LOCATION APC FUNCTION 

ARMLIM 216 SPECIFIES MAXIMUM LIMIT FOR RMS NOISE. MAY 

BE CHANGED TO ZERO TO FORCE TYPEOUT OF RMS 

ENVIRONMENT* CH * NNEL ™™ G lH * SYST£M 

APKLIM 220 SPECIFIES MAXIMUM LIMIT FOR PEAK NOISE. MAY 

BE CHANGED TO ZERO TO FORCE TYPEOUT OF PEAK 
NOISE ON A CHANNEL RUNNING IN A SYSTEM 

ENVIRONMENT. 

CLSTCH 164 IF SRI 8IT1=U USED TO SPECIFY END CHANNEL 

FOR SAMPLING STABLE INPUT. 

OFFALL 170 IF SRI BITl=l c USED TO SPECIFY TOLERANCE OF 

STABLE „ CHANNEL, PRESET BY MODULE TO 
f, 000002 n . 

NLSTCH 166 IF SRI BIT2=1 £ USED TO SPECIFY END CHANNEL 

FOR NOISE TESTING. 
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9,0 NON-STANDARD PRINTOUTS 



SEQ 0007 



PAGE 6 



1. 



IT REPORTS IT IN AH 



3. 



4, 



IT IH AM 



IF A CHANNEL HAS EXCESSIVE RMS NOISE, 
ERROR CALL AND A MSGN CALL: 

(EXAMPLE) 

ON CH. 00 A/D RMS NOISE=0.52 LS8 (LIMIT=.25LSB) 

IF A CHANNEL HAS EXCESSIVE PEAK NOISE, IT REPORTS 

ERROR CALL AND A MSGN CALL: 

(EXAMPLE) 

ON CH. 00 A/D PEAK NOISE=2. 57LSB(L IMIT=2. OOLSB) 

IF THERE IS AN EXCESSIVE AMOUNT OF NOISE SO THAT THE DAC 
CANNOT BE ADJUSTED, IT REPORTS IT IN AN ERROR CALL AND A MSGN 
C ALL : 

(EXAMPLE) 

PE&& WRAPAROUND ERROR ON CHAN. 00 



IF A CHANNEL IS FOUND TO BE UNSTABLE 
S AMPLE IN G# IT REPORTS IT IN A MSGN CALL: 

(EXAMPLE) 

ON CHAN 14 OLD AVERAGE=4066 NEW AVERAGE=4000 



IN STABLE INPUT 



t 
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.TITLE ADBB DEC/Xll SYSTEM EXERCISER MODULE 
OOXCOW VERSION 6 23-MAY-70 

.LIST BIN 

• *********** ************** A* ********* ****** ******** 

BEG I N * 

041102 040 MODMAM: . ASCII /ADBB / ; MODULE NAME. 

XFLAG: , BYTE OPEN ;USED TO KEEP TRACK OF WBUFF USAGE 

ADDR; 170400+0 > 1ST DEVICE ADDR. 

VECTOR: 340+0 ;1ST DEVICE VECTOR. 

m -mi nun minimi: 

DVIOl: «■! ; DEVICE INDICATOR 1. 



000016* 000000 SRU OPEN JSWITCH REGISTER , 

ooo8io-Joo 5M |R|: a E!5 iiBlKl ItiiifH ? 

SR4: OPEN } SWITCH REGISTER 4 

. ****** a** ************************************** ****************** 

STAT: 140000 ; STATUS WORD. 



PASCNT: ;PASS COUNTER. 

ICONT: 1 Ji OF ITERATIONS PER PASS=1 

ICOUNT: 1LOC TO COUNT ITERATIONS 

SOPCNT: JLOC TO SAVE TOTAL SOFT ERRORS 

HRDCNT: >LOC TO SAVE TOTAL HARD ERRORS 

SOFPAS: >LOC TO SAVE SOFT ERRORS PER PASS 



HRD°AS: ;LOC TO SAVE HARD ERRORS PER PASS 

SYSCNT: ;# OF SYS ERRORS ACCUMULATED 

000000 RANNUM: > HOLDS RANDOM # WHEN RAND MACRO IS CALLED 

CONFIG : /RESERVED FOR MONITOR USE 

888888 Kill! 8 5SlilBSIB for mRnHSI 811 

000000 SVRO: OPEN ;LOC TO SAVE RO. 

000000 SVRl: OPEN ;LOC TO SAVE Rl. 

000000 SVR2: OPEN ? LOC TO SAVE R2. 

000000 SVH3: OPEN J LOC TO SAVE R3. 

000000 SVR4: OPEN ;LOC TO SAVE R4. 

000000 SVR5: OPEN ?LOC TO SAVE R5. 

880880 cIra: SpII |a8Sr T 8f S 4uIrfnt csr. 

sbadr: i addr of good data# or 

000000 ACSR: OPEN ; CONTENTS OF CSR. 

WAS ADR: > ADDR OF RAD DATA, OR 

000000 ASTAT: OPEN ;STATUS REG CONTENTS. 

ERRTYP: >TYPE OF ERROR 

000000 ASB: OPEN ; EXPECTED DATA. 

000000 AWASS OPEN ; ACTUAL DATA. 

001130' RSTRT: RFSTRT } RESTART ADDRESS AFTER END OF PASS 

000000 WDTO: OPEN ; WORDS TO MEMORY PER ITERATION 

000000 WDPR: OPEN ; WORDS FROM MEMORY PER ITERATION 

000000 INTR: OPEN ; ft OF INTERRUPTS PER ITERATION 
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m 

331 
334 

Hi 
ill 

339 
340 
3 41 
342 
343 
344 



3 45 



M ; 000103 



000224' 000000 

mm- mm 



000232- 170400 
000234- 

000234- 170402 



000236' 170404 
000240- 170406 




IDNUH: 
MODSP: 
. ****** 



NLSTCH; 
OFFALL: 



adsr: 
dac: 

ADBR: 



ASR: 

abr: 



m 
m 

000002 
177664 

imn 

76 



5067 177676 



103 } MODULE IDENTIFICATION NUMBFR=103 

r****** ********************************* ************************* 

;*OPTIONAL USER SUPPLIED IN 

. WORD ;USER SUPPLIED LAST SAMPLED CH 

I word \ |S1Ir ISpplIId tSEer!nJI e fSr"s AMPLE 

} * 

;*REGISTER AND VECTOR ADDRESS 



.WORD 170400 

. WORD 170402 

i THE FOLLOWING 

.WORD 170404 
. WORD 170406 



JA/D CSR ADORFSS 

;DAC (WRITE ONLY) AND BUFFER REG (READ ONLY) 

ARE KW11K ADDRESSES IF A KW11K EXISTS. 

; CLOCK A 
; CLOCK A 



;*FLAGS # COUNTERS AND OTHER REGISTERS 



WHO: 

INTFLG: 

FRED: 

edge: 

TMP: 
armx: 

ARMLIM: 

apkx: 

APKLIM: 

NCCH: 

cch: 

PASSCNT: 
NUMB Al : 
NUMBA2: 
NUMB A3: 



WORD 
.WORD 

•m 

WORD 

. WORD 
WORD 
.WORD 
WORD 
. WORD 
.WORD 
WORD 
.WORD 
. WORD 
.WORD 



io. 

2*00. 



;0=RMS NOISE* 1=PEAK NOISE 

;USED IN LOGIC TEST TO INDICATE AN A/D INTR. 

\\m mm ani'iuBe mBE - 

;temp working area. 
;used to hold rms noise value, 
noise lim*- 



J RMS NO 



2767 020064 177612 START: 



177600 
177574 



MOV 
MOV 
MOV 
MOV 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
CLR 



t8244.,lNTR 



|k 

ADDR/RO 



'.»IB 



_ISE LIMIT. 

>USED TO HOLD A/D PFAK NOISE VALUE. 
?A/D PEAK NOISE LIMIT. 

JElffiiH SSSfMs. 

JPASS CNT. 



;8244 INTERRUPTS/ ITERATION 



DR/RO 

ADBR 
RO 
ASR 



n mi wmmmf 



1 

#2,RO 
k0# ABR 

NCCH 



/ 

I GET "BASE ADDR OF A/D 
5FIX A/D CSR ADDR. 
? BUFFER REG=CSR4-2 



FIX BUFFER REG ADDR. 
CLOCK CSR= BUFFER REG+2. 
FIX CLOCK CSR ADDR. 
PRESET ADDR=CSR+2. 
FIX CLOCK PRESET REG ADDR. 
CLEAR 1ST CHAN. FOR NOISE. 
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n mm- mm- 



384 
385 
386 
387 
3 88 
389 
390 
391 
192 
393 
394 
395 
396 
397 
398 
3 99 
400 

40 3 
404 
405 
406 
407 
408 
409 

ttl 

412 
413 
414 

in 

m 

419 

420 

«i 

m 

425 
426 
427 
428 
429 
430 
431 
432 
433 

m 

436 
437 

438 
439 



000000" 000256* 
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******* ******************************************************* 

;CONVERT ARMLIM TO ASCII AND 
; STORE AT DECTM 

BTODS, BEGIN, ARMLIM, OECIM 

•A********************* ******************************* ******** 



000376' 

tma- 



116767 002170 002375 

mm mm mm 



000420' 
000426' 

000430' 
000436" 
000444 



104421 
002570" 



000000' 000262' 



0' 116767 002136 00235' 
6- Iplll Q02131 00235 



6767 002124 0023 



000452' 005777 177554 



000456- 
000456' 
000462' 
000466' 
000474' 



104407 000000" 
104407 000000' 



83?402 



000001 177322 



000476' 005777 177534 



000502' 005067 177536 
000506- 012777 000600' 177274 
000514' 012777 000101 177510 



000522* 104407 000000" 
000526' 104407 000000" 



m 

SEQ 0010 



MOVB 
MOVB 

MOVB 



DECIM*2,P7 
DECIM«-3,P7+2 

DECTM+4,P7»3 



;N0W WE WILL PUT IT 

; INTO THE ASCII 

;MESSAGE THAT WE TYPE OUT. 



*************************************************** 
; CONVERT APKLIM TO ASCII AND 
;STORE AT DECIM 



***************** 



BTQD$, BEGIN, APKLIM, DECIM 

• ******************************************* 
MOVB DECIM+2,P8 ;NOW WE WILL PUT IT 

MOVB DEClM+3,Pg+2 ;INTO THE ASCII MESSAGE 
MOVB DEClM+4,P8+3 JTHAT WE TYPE OUT. 



;*LOGIC TEST #1 

;*IN THIS TEST WE WILL SEE IF THE A/D RESPONDS TO ITS 
;*ADDR. IF NUT, A DEC/Xll H SYS ERROR..." WILL OCCUR 



@ ADSR 



} ADDRESS THE A/D 



?*LOGIC TEST |2 

;*IN THIS TEST WE WTLL SEE IF THE CLOCK RESPONDS TO ITS ADDR, ONLY 
; *IF THE CLOCK OPTION IS SELECTED BY SRI. 



BREAKS, BEGIN 
BREAKS , BEGIN 
BIT «BIT0 

BEQ LOG3 



♦LOGIC TEST #3 

*IN THIS TEST WE WTLL 



CLR 
MOV 
MOV 



#1$,§¥ECT0R 
#101,(MDSR 



BREAKS, BEGIN 
BREAKS, BEGIN 



;TEMPORARY RETURN TO MONITOR.... 
;THEN CONTINUE AT NFXT INSTRUCTION. 
; IS CLOCK OPTION SELECTED? 
;RR IF NOT TO NEXT TEST. 

;CLOCK WAS SELECTED, WILL IT RESPOND? 



SEP IF THE A/D WILL INTERRUPT. 

; CLEAR A/D DID INTR. FLAG. 
;SET UP VECTOR ADDR. 
; ST ART A CONVERSION, 
; BEFORE BREAK TIME ' 

TEMPORARY RETURN TO MONITOR.... 

> THEN CONTINUE AT NEXT INSTRUCTION. 



000532" 
000536' 
000540' 

mm- 

000560' 


005767 
001027 
016767 

mm 

012767 


177506 
177466 

WIS! 

000011 


177332 
177326 

177320 


000566' 


104405 


000000' 


oooooo 


000574' 


104410 


oooooo- 




000600 ' 
000604' 

mm- 


005077 
005777 
005267 
000002 


177426 
177424 
177430 


IS 
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440 
441 
442 
443 
444 
445 
446 
447 
448 
449 
450 
451 
452 
453 
454 
455 
456 
457 
458 
459 
460 

ttl 

463 
464 
465 
466 
467 
468 
469 
470 
471 
472 
473 
474 
475 

Hf 

478 
479 
480 

m 

483 
484 
485 
486 
487 
488 
489 
490 
491 

«? 

494 
495 
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000616" 
000624' 

mm- 

000642' 
000650' 

000652' 
000652' 
000656' 
000662' 
000666' 
000670' 
000672' 
000674' 
000674" 
000702' 

000706" 
000712- 



032767 
001451 

012777 
012777 
012/77 

005000 



104407 
104407 

mai 

105200 
001367 

017767 
005077 

105777 
100416 

016767 
017767 
012767 



000001 177172 LOG4: 



177777 177404 
000040 177370 
000011 177366 



oooooo- 

000000" 
177350 



177336 177202 
177330 



177312 177156 
177304 177152 
000046 177150 



000736" 104405 000000' 000000 



TST 
BNE 
MOV 
MOV 
CLR 



INTFLG 
LOG4 



ADSR,CSRA 
»ADSR,ACSR 
flADSR 



JDID THE A/D INTERRUPT? 
;IF SO, NEXT TEST 



;SET ADDR. OF AD CSR FOR ERROR TYPEOUT. 
; RECORD CONTENTS OF CSR. 
?STOP A/D 

MOV lllrfRRTYP 5MISSING INTERRUPT 

• ********************************************************** 

• * ***5 *S i*J[ * c *y \ ********* ^2** ^i^5**I***^J§***§l* ********** 

ENDS, BEGIN ; 



********** 



5*A/D SHOULD TNTR. 
CLR @ADSR 
TST 0ADBR 

II ' 



INC 
RTI 



INTFLG 



TO HERE. 

;STOP A/D. 

; CLEAR CSR BIT07. 



;*LOGIC TEST *4 

>*THIS TEST WILL ONLY BE DONE IF THE CLOCK OPTION IS SELECTED 
;*IN THIS TEST WE WTLL SEE TF THE OVERFLOW OF CLOCK I WILL 
;*TRIGGER A CONVERSION IN THE A/D 



BIT 

BEQ 

MOV 
MOV 
MOV 
CLR 



777, flA 

5,aifis 

gU,i^R 



BREAKS, BEGIN 
BREAKS, BEGIN 
TSTB § AS R 
BMI 2S 
INCB RO 
BNE IS 



MOV 
CLR 



TSTB 
BMI 



p ASR, ASTAT 
@ASR 



MOV ADSR,CSRA 

MOV 8ADSR,ACSR 

MOV f46,ERRTYP 

• ********************** 

HRDERS /BEGIN, NULL 

. ********************** 



;IS THE CLOCK OPTTON SELECTED? 
} TF NOT, GOTO NEXT TEST. 

; PRESET CLOCK FOR ALL ONES. 
;SET OVERFLOW ENABLE IN A/D. 
J START CLOCK, 1MHZ, GO. 
JSET FOR DELAY LOOP. 

; TEMPORARY RETURN TO MONITOR.... 
;THFN CONTINUF AT NEXT INSTRUCTION. 
;IS THE CLOCK OVERFLOW SET? 
JYES-EXIT LOOP. 
;NO,IS DELAY EXCEEDED? 
>NO-CONTINUE DELAY. 

; RECORD CONTENTS OF CLOCK CSR. 
; CLEAR THE CLOCK. 

;IS DONE FLAG SET' 
J IF YES NEXT TEST. 
J IF NOT, ERROR 
;RECORD A/D CSR ADDR. 



; RECORD CONTENTS OF A/D CSR. 
3 CLOCK FAILED TO TRIGGER A/D 
***************************** 



************ 



************************* 



?FOR THIS ERROR YOU MIGHT CHECK 
;TO SEE IF A OVERFLOW IS WIRED TO 
# A/D INPUT. 
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2$: 
3S: 



177166 

177162 177120 
177152 177106 



* 000004 000000' 001042' 



ENDS, BEGIN 



?DROP THIS MODULE - FATAL ERROR. 

/CAN'T CONTINUE IF OVERFLOW DOESN'T TRIGGER THE CONVERSI 



;*LOGIC TEST #5 

;*IN THIS TEST WE WILL SAMPLE ALL CHANNELS SELECTED 
; *FOR TEST AND STORE A WAY THE TR RESULTS. 



BREAKS, BEGIN 

BREAKS, BEGIN 

TST 0ADBR 

CLR flADSR 

CLR CCH 

MOV #4$,(aVECTOR 

f-B-,R0 



MOV 
CLR 
MOV 
SWAB 

BIS 

MOV TMP, pADSR 

EXITS, BEGIN 



Si 8 - 

CCH, TMP 
TMP 

#BIT6!BIT0,TMP 

fb"~ 



ADD 



INC 
BMI 

ASR 
ASR 
ASR 
ADC 
MOV 
ASL 
MOV 

INC 
CMP 
BLE 
CMP 
BLE 
BR 



@ADBR,R1 



RI 
Rl 

?£h,R2 
R2 

R1,RECSAM(2) 

CCH 

CCH rNLSTCH 

cch, clstch 
rIstrt 



;TEMPORARY RETURN TO MONITOR.... 

} THEN CONTINUE AT NEXT INSTRUCTION. 

;FALSE READ OF A/D BUFFER. 

/CLEAR A/D'S CSR 

; START ON CH. 0. 

;SET UP INTR- VECTOR. 

;S£T TO DO 8 CONVERSIONS. 

;R1 HILL CONTAIN SUM OF CONVERSIONS. 

JGET CH. NUMBER. 

;PUT IN CORRECT CSR POSITION. 

; ADD INTR. ENABLE AND GO. 

;START A/D. 

;EXIT TO MONITOR. MODULE WATT FOR INTERRUPT. 

7 SUM THIS RESULT. 

} NOTE INTR SERVICE WILL 

; being use here after a pirq 
} done 8 conversions? 
;no - do another one. 

;now we must 

^CALCULATE THE AVERAGE 
;0F THE SAMPLES THAT 
;WE JUST TOOK. 
;PICK UP CH. NUMBER. 
;HSE IT AS AN OFFSET. 
; STORE THIS AVERAGE. 

; UPDATE CH. NUMBER. 
/DONE ALL NOISE CHANNELS? 
; NO-DO NEXT ONE. 
JDONE ALL STABLE CHS? 
;NO -DO NEXT ONE. 
;YES-GOTO NOISE TESTS. 



;*A/D INTERRUPTS TO HERE 



PTRQ$, BEGIN, 3S 



001130 
001134 



005077 177076 
005067 177130 



; QUEUE UP TO CONTINUE AT 3S AND RTI 
; CLEAR A/D'S CSR. 
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MOV 
MOV 
MOVB 



VECTOR, RO 



;S£T VECTOR AND PSW 

; LOAD INTR- ADDR. INTO VECTOR ADDR. 
;LQAD PRIORITY 



^CALCULATE A/D RMS NOISE USING WRAPAROUND D AC. 



ADRMSt: MOV 
MOV 
SWAB 
BIS 
MOV 
ASL 
MOV 
INC 
MOV 
MOV 
JSR 
MOV 
MOV 
JSR 
SUB 
MOV 
CMP 
BLE 
JSR 



#431. ,R0 
NCCH,TMP 

TMP 

#100, TMP 
RCCH,R1 
Rl 

RECSAM(1 ),EDGE 
WHO 

TMP, (iADSR 
DAC,R1 
PC,SAR 
FRED,R5 
#31., RO 
PC,SAR 
FRED £ R5 
R5# ARMX 
R5, ARMLIM 
ADPK1 
PCERCOM 

MOV #3l,ERRTYP 

*********************** 

HRDERS, BE GIN, NULL 

• ********************** 

MSGN$ ,B EG IN ,MSG1 



;R0 = 84.13% OF 512 CONVERSIONS 

; GET THE CHAN # 

;PUT IN PROPER CSR POSITION. 

;FORM AN OFFSET. 
> GET EDGE VALUE FOR THIS CH. 
; INDICATE RMS NOISE TEST. 
;CH.#0, AND INTERRUPT ENABLE 
;R1 = ADDRESS OF SAR DAC 

$GET DAC VALUE THAT PRODUCES 16/84 SPLIT 
;SAVE LEFT BOUNDARY 



;R0 = 15.87% OF 512 CONVERSIONS 
JGET DAC VALUE THAT PRODUCES 84/16 
;R5 = BREADTH OF NOISE B 68% AREA 



;SAVE FOR DAC NOISE CALCULATIONS 
;< OR = RMS LIMIT? 
;IF WITHIN LIMIT THEN CONTINUE AT ADRMS2 
;GET ERROR PARAMETERS 

; ERROR PARAMETERS LOADED BY ".ERCOM" 
J A/D NOISE ERROR 
************************ ***************** 

;>RMS NOISE ERROR-SEE NEXT TYPEOUT 
***************************************** 

;ASCII MESS AGF CALL WITH COMMON HEADER 



; CALCULATE A/D PEAK NOISE USING WRAPAROUND DAC. 



#509. ,R0 
NCCH,TMP 

TMP 

#100, TMP 

WHO 

TMP, fADSR 

DAC,R1 

PC,SAR 

FRED,R5 

#3,R0 

PC,SAR 

FRED,R5 

R5,APKX 



PC, ERCOM 



60 
607 



176456 
000000 



MOV 

MOV 
SWAB 

BIS 
CLR 
MOV 
MOV 
JSR 
MOV 
MOV 
JSR 
SUB 
MOV 
CMP 
BLE 
JSR 



MOV 

• *** 

HRDER$, BEGIN, NULL 



*m**mv** 



;FOR EAK OF 2 1/2 SIGMA 
;GET CHAN. NUMBER. 
;PUT IN CORRECT CSR POSITION. 
;ADD INTR. ENABLE 

^INDICATE PEAT NOTSE TEST. 

;CH. AND INTERRUPT ENABLE, AND CH 

?R1 = ADDRESS OF SAR DAC 

J GET DAC VALUF THAT GTVFS .6% LOW COUNT 

;R5 = LEFT BOUNDARY 

; CHANGE SPLIT FOR RIGHT BOUNDARY 

; GET DAC VALUF THAT GIVES .6% HIGH COUNT 

;R5 = A/D PEAK TO PEAK NOISE 

;SAVE FOR DAC NOISE CALCULATIONS 

)S.lBeS ifUM 15 * tmT? 

?GET ERROR PARAMETERS 
; ERROR PARAMETERS LOADED BY "ERCOM" 
JA/n NOISE ERROR 
******************************************* 

; 7 PEAK NOISE ERROR-SEE NEXT TYPE OUT 



A08B DEC 
XADBBO.P 
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001436* 104403 000000" 002616' 



ri 

628 



k 

635 

ii 

f 39 
640 
641 

Hi 

644 
645 
646 
647 
648 

III 

654 



657 
658 

m 

661 
§62 
663 



m 

001456* 
001460" 



001476* 
001500* 

s||i|o* 

001526- 

mm- 



P 

001013 
000167 177450 
00 

V 



176620 

000004 176340 

176604 000001 

000001 176320 



0015 

nil 



.542 

8818?* 

001" 



032767 

mm 

P?67^7 



176554 
1765" 



. 88183! 

I: ill!' 



>550 176510 
176540 

000002 176262 
176524 

176520 176454 



i|72* 000301 
600- 8f 8l77 
604* 104400 



mm 



o 

001610 

001610' 000004 000000- 001616' 



001616* 067703 
001622- 005300 
001624- 001365 



mm- 

001632' 
001634* 
001636 ' 
001642- 

mm- 



006203 
006 203 

006203 
005503 
016700 
006300 
010301 
166003 



001652* 100001 
001654' 005403 



3S: 
4$S 



5$ i 
6S: 



7$: 



. ******************** 

MSGM$, BEGIN, MSGS 



***************************************** 

I ASCII MESSAGE* CALL WITH COMMON HEADER 



INC 

BIT 
BHE 
CMP 
BBQ 
BIT 
BME 

JMP 

INC 
CMP 
BLOS 
CLR 

BR 

BIT 

BEQ 
CLR 



MOV 
MOV 
MOV 
SWAB 



PASSCNT 

|BIT2,SR1 

|ISSCNT r #l 
JBIT0,SR1 

ADKMSl 
NCCH 

N^CH/MLSTCH 
||CH 

#BIT1,SR1 

EENOP 
CCH 

CCH,CLSTCH 

l;I? KC,cm 



) UPDATE PASS COUNT. 
; DOING MULTIPLE NOISE 



If 



EXITS, BEGIN* 



DSR 



CHANNELS? 

;YES - GET THE NEXT ONE 

;NO DO AGAIN. 

; POINT TO NEXT CH. 

} EXCEED LAST NOISE CH? 

;no-test THIS CH. 

5 YES - START AGAIN ON CH. 0. 

J GO TEST CH 0. 

; ARE WE DOING VOLTAGE SAMPLING? 

J NO - END PASSI 

;YES - START WITH CH 0. 

; DONE ALL CHANNELS? 

jH^iLEHBK IHMI!*- 

} GET CH. NUMBER 

>F£X RIGHT POSITION IN CSR. 

US^k¥ n I?b. enabi - e and g0 - 

>EXIT TO MONITOR. MODULE WAIT FOR 



PIRQ$,BEGIn77$ 



; QUEUE UP TO CONTINUE AT 7$ AND RTT 



ADD 
DEC 
9NE 

ASR 
ASR 
ASR 
ADC 
MOV 
ASL 
MOV 
SUB 

BPL 
NEG 
CMP 

BLE 



|ADBR,R3 

5S 

R3 
R3 
R3 
R3 

CCH,R0 
RO 

R3,R1 

RECSAM<0),R3 



J ADD THIS SAMPLE TO TOTAL 
} ALL DONE ALL SAMPLES? 
J NO - DO NEXT ONE. 

jyes now we 
;must divtde by 

>8 TO GET THE 
} SAMPLE average. 

;NOW GET CH. NUMBER 

J FORM AN OFFSET 

*SAVE NEW SAMPLE VALUE. 

; GET THE DIFFERENCE BETWEEN 

JWMHtIH 8 e %SV! st GQT 

;0THERWISF MAKE IT POSTIVE. 
;IS IT WITHIN TOLERANCE? 

JVES DO NEXT CH 



ADBB DE 
XADBBO. 

664 
665 
666 
667 
668 
669 

m 

672 
673 
674 

675 
676 

m 

679 
680 

SSI 

683 
684 
685 
686 
687 

itt 

690 

m 

693 
694 
695 
696 
697 
698 
699 
700 
701 
702 
703 
704 
705 
706 
707 
708 
709 
710 
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m&r- 


104420 
003332- 


oooooo- 


000266' 




001674' 


016067 


003112- 


176372 




001702- 
001710' 


hltffl- 


oooooo- 


000274- 




ool^iS- 


mm- 


oooooo- 


000276' 




001722* 


010160 


003112' 






001726' 


104403 


000000' 


002654* 




001734' 
001740' 


005267 
000167 


176326 
177576 




10$: 


001744' 
001744' 


104413 


oooooo- 




EEMDP 


001750- 


000167 


177154 
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} *************************************************************** 

JCONVERT CCH TO ASCII AND 
jSTORE AT CHANN 

OTOA$,BEGIN,CCH,CHANN 

j ************************************************************** 
MOV R ECS AMf ) .NUMB A2 

j **************************************************************-* 
;CONVERT NUMBA2 TO ASCII AND 
; STORE AT OLDS 

□TOAS, BEGIN, NUMBA2, OLDS 

• ************** *********************************** **** ********* 

^ *************************************************************** 
; CONVERT NUMB A3 TO ASCII AND 
; STORE AT NEWS 

OTOAS, BEGIN, NUMB A3, NEWS 

************************** A *************************** ********* 

MOV Rl,RECSAM(RO) ;PUT NEW INTO OLD. 



MSGN$, BEGIN, MSG12 



INC 
JMP 



CCH 
4$ 



> ASCII MESSAGE CALL WITH COMMON HEADER 

JLOOK AT NEXT CHAN. 
;GO TEST IT 



; SIGN AL END OF ITERATION, 
J MONITOR SHALL TEST END OF PASS 



001762' 
001766' 
001772' 
001776' 
002000- 



002004- 
002012- 

002014- 
002022' 

mm- 

002034' 

mar- 



SJioii 000200 

005067 176260 
060267 176254 
016711 176250 

001000 



;USING 

SAR: 



END ITS , BEGIN 
JMP RESTRT 

SUCCESSIVE APPROXIMATION AND WRAPAROUND DAC DEFINED IN Rl. 
f200,R2 



005003 
012704 



032767 000001 176004 
001004 

052777 000001 176210 
000420 

mm mm 

052767 177770 000426 

mm mm mm 



IS: 



MOV 
CLR 
CLR 
ADD 
MOV 
CLR 
MOV 



BIT 

BNE 



JSR 
CLR 
BIS 
MOV 
BIS 



FRED 

R2,FRED 

FRE0,(R1) 

R3 

#512. ,R4 



|BIT0,SR1 
|BITO,gADSR 
PC, RANDY 

tASR 
177770, R 



IM*!} W - 



A 

gADSR 



;R2 = MSB OF DAC 
; GET RID OF 'ONES' 
;START WITH ZFRO DAC 
; TRY THIS BIT 
; LOAD DAC. 
;INIT HIGH COUNT 
;R4 = # OF SAMPLES IN 



J IS CLOCK SELECTED? 
>YES GOTO HANDLER. 

;NO - SET GO BIT IN A/D. 
J GOTO 2$ 

;get a random number. 

J MAKE SURE THE CLOCK'S CSR IS 
JMAKE SURE OF HIGH NUMBER. 
;SET CLOCK PRESET REG. 
;SET OVERFLOW ENABLE. 
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OOOOOO * 002074* 
176134 176146 
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2- • 

755 
756 
757 
758 
759 
760 

m 

763 
764 

lit 

767 

768 
769 
770 
771 
77? 
773 
774 
77S 



104403 
005267 
005726 



176114 

176106 000377 



oooooo * oooooo 

176052 

000000" 002636' 



000000' 002676' 
175630 



002216' 


000167 


177222 




002 222' 
002222' 
002224' 
002230' 
002234' 
002240' 


005000 
01270 4 
012701 
012702 


001000 
100000 
040000 




002240' 

002246' 


032767 
001004 


000001 


175550 


002250' 


052777 


000001 


175754 



#U,@ISR 



EXITS 



J ST ART CLOCK 

1 RETURN TO MONITOR. 



PTRQS, BEGIN, IS 
CHP 



} QUEUE UP TO CONTINUE AT 1$ AND RTI 



8LO 
INC 

DEC 
BNE 

ble 

SOB 
ASR 
BNE 
fSf 
8EQ 
CMP 
BSQ 
RTS 



ADBR, EDGE 




> OR = EDGE? 
BRANCH IP <EDGE 
COUNT IF > OR =EOGE 
COUNT THROUGH BURST 
BRANCH IF NOT DONE 

HIGH COUNT > % OF 512 CONVERSIONS? 



; VOLTAGE NEEDED TO PRODUCE « 
;RANGE Of THE WRAPAROUND DAC 
/CLEAR INTERRUPTS, PRINT MESSAGE AND DROP MODULE 



BRANCH TO LAVE BIT IN 

;take Bit out 

H FXT BT T 
5 AND GO RESOLVE IT IF NOT DONE 
? CHECK FOR ALL 'ZEROES* 
J BRANCH IF INVALID RESULT 
| CHECK: FOR ALL 'ONES' 
; BRANCH IF INVALID RESULT 
; RETURN TO ADRHS1 OR ADPKl. 
HIGH COUNTS SPECIFIED IS OUT OF THE 



CLR »ADSR ;STOP A/D 

JSR PC,ERCOM ;GET ERROR PARAMETERS 

} ERROR PARAMETERS LOADED BY "FRCOM" 

5 ***** *********************************************** *********** 

HRDER$ < BEGIN < NULL ; 5 NOISE TEST WRAPAROUND ERROR 

. ^ ■ ********* A************************ ************** 



1st 

BNE 



WHO 



MSGNS, BEGIN, MSG11 



HSGH$, BEGIN, MSG13 
INC HRDCNT 
TST (6)+ 



ENDP 



;SEE WHICH TEST WE WERE DOING* 
J¥HO=l THEN RMS NOISE TEST. 
; ASCII MESSAGE CALL WITH COMMON HEADER 
;GO AHEAD. 

; ASCI I MESSAGE CALL WITH COMMON HEADER 

? update the error count. 

> restore stack from the jsr pc that 

;got us to "sar". 

J GET NEXT DIRECTIVE. 



?GET THE AVERAGE OF 512 SAMPLES AND THEI 

aver: 

CLR RO 

,R4 

r " 



COUNT SPREAD 



econ: 



CLR 
MOV 
MOV 
MOV 



BIT15,P1 

BIT14,R2 



;INIT RO FOR PUNNING SUM 
;BURST OF 512 CONVERSIONS 
; INIT HIGH COUNT TO NEGATIVE » 
;INIT LOW COUNT TO POSITIVE # 



#BIT0,9ADSR 



J IS CLOCK SELECTED? 
; YES GOTO HANDLER. 



SET GO BIT TN A/D. 
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002256' 000420 



175746 
177770 
000166 

on 




000060 
54 

42 

0000 36 
000034 
000024 
000016 

"o°8o°o l i 



000172 

175734 
175720 

175716 



BR 

JSR 
CLR 
BIS 
MOV 
BTS 
MOV 



2$ 

PC, RANDY 

f 177770, RNA 
RNA, gABR 

KI*St!» MR 



EXITS, BEGIN 
PTKQSr BEGIN, 1$ 
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SE 

;goto 2S 

JGET A RANDOM NUMBER. 

;MAKE SURE THE CLOCK'S CSR TS CLEAR. 
;MAKE SURE OF HIGH NUMBER. 

} SET CLOCK PRESET REG. 
;SET OVERFLOW ENABLE. 
;ST ART CLOCK 

1 EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 

J QUEui UP T0""c0NTINUE""AT~Ii~AND"RTl"""^ 



016767 
017767 

016767 
010567 



loo 

SUB 

CMP 

BLE 

MOV 

CMP 

BGE 

MOV 

DEC 

BNE 

SWAB 

MOVB 

ASR 

ADC 

ADD 

SUB 

RTS 



g ADBR,R0 
R3,R0 

|a5br,ri 

@ ADBR,R1 
||DBR,R2 

|JDBR,R2 

ECON 

RO 

R0,P0 

RO 
RO 

R3,R0 
R2,Rl 

PC 



; GENERATE A RANDOM NUMBER 



;r0 = running sum of differences 
jqffset by expected value 
;higher than previous high? 
t branch if not a new high 
j new high result 
; lower than previous low? 
branch if no 



HgJ N LOW.RESULT_ 



_ THROUGH BURST 
DO ANOTHER SAMPLE IF NOT DONE 
DIVIDE SUM OF DIFFERENCES BY 256 
SIGN EXTEND 
DIVIDE BY 2 MORE 
ROUND UP FOR > 1/2 

OFFSET AVERAGE BY FXPTECTED RESULT 
Rl = COUNT SPREAD 



000054 
000046 



000036 
000030 



000020 
000012 



ADD 
ADD 
ADC 
ADD 
ADD 
ADC 
ADD 
ADD 
ADC 



RNA: 
RNb: 
RNC: 



RMB,RflA 
RNC, RNA 
RNA 

RNA, RNB 
RNC, RNB 
RNB 

RNA, RNC 
RNB, RNC 

RNC 
PC 



; THESE FOLLOW SEQUENCE OF 

; INSTRUCTIONS GENERATE 

; A RANDOM NUMBER 

; TO BE USED 

; TO BE LOADED 

; INTO THE CLOCK'S PRFSET 

; BUFFER, IF SELECTED FOR TEST. 

I ONLY RANA WILL BE USED. 

; RETURN TO "CONV" 
f RANDOM TO NUMBER A. 
; RANDOM NUMBER B. 
; RANDOM NUMBER C. 



?CONVERT NOISE RESULT TO DECIMAL 



175530 175374 

175522 175370 

175310 175364 
175546 



mov adsr,csra 

mov @adsr,acsr 

mov Stat, astat 

mov r5 c numba1 

• *********&*** ********* 



? LOAD HEADER FOR ERRORN CALL 



•C** ************************* ******** 
JCONVERT NUMB Al TO ASCII AND 
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m 

834 
835 
836 
837 
838 
839 
840 
841 
842 
843 
844 
845 
846 
847 
848 
849 
850 
851 
852 
853 
854 
855 
856 
857 
858 
859 
860 
861 
862 
863 
864 
865 
866 
867 
868 
869 
870 
871 
872 
873 
874 
875 
876 
877 
878 
879 
880 
881 
882 
883 
884 
885 
885 



002524* 
002532' 

002534; 



002556' 
002564' 



002566' 
002570' 



002636' 

mm- 

002644' 
002646* 
002650' 
002652* 

002654* 
002656' 
002660* 
002662' 
002664' 
002666* 
002670' 

mtw- 



0025?!* 

mm 



104420 
003332* 



000207 
000003 



002722' 
003336' 
002714- 
002753* 
002767' 
003065- 
003001* 
177777 

002722* 

mw- 

002761* 
002767- 
003065* 
003013- 

mm 



002761* 
003043- 



000000* 000272- 



000032 
000025 
000020 



000000- 000264- 



BT00$# BEGIN* NUMB Al#DECIM" 



} STORE AT DECTM 



^ ********************* 

MOVB DECIM+2#VALUE 
MOVB DECIM*3, VALUE* 



OTOA$r BEGIN# NCCH # CHANN 
• ********************* 
RTS PC 

. BLKW 3 

JASCII MESSAGES AND POI 
P2 

CHANN+4 

Pt 
P4 

VALUE 

P7 

-I 

P2 

CHANN* 4 

n 

P6 

VALUE 

P8 

-1 

PI 

P5 
P13 
P15 
P2 

CHANN*4 

PI 
P15 

CHANN+4 

P3 

OLDS+2 
P9 

NEWS*2 



**************************************** 
;MOVE CONVERTED VALUES TO ASCII BUFFER 

2 ;F0R TYPEQUT OF ERROR 

3 J ON RETURN 

***************************************** 
JCONVERT NCCH TO ASCII AND 
; STORE AT CH ANN 



*********************************** 
; EXIT TO CALLER. 



;ON CHAN 

; (CHAN NUMBER 2 

; % a/d 
; RMS 



<[ CONVERTED BELOW) X.XX LSB (LIMIT = 



IF OPERATOR CHANGES 



1.50 LSB) "THIS VALUE WILL CHANGE 
MESSAGE TERMINATOR. 

ON CHAN 
jCHJN NUMBER 2 DIGITS) 

PEAK 
NOISE = 

(CONVERTED VALUE) X.XX LSB (LIMIT = 

2.00 LSB) "THIS VALUE WILL CHANGE IF OPERATOR CHANGES 
MESSAGE TERMINATOR 

% A/D 

WRAPAROUND 

ERROR 
ON CHAN 

(CHAN NUMBER 2 DIGITS) 
MESSAGE TERMINATOR 

* A/D 

RuR 



2 DIGITS) 



ON CHAN 
(CHAN NUMBER 
JOLD VALUE = 
"A/D READING 4 DIGITS 
NEW VALUE = 

"NEW A/D READING 4 DIGITS 
MESSAGE TERMINATOR. 



87 002676' 002714' 
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888 
889 
890 
891 
892 
893 
894 

m 

897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 



913 

$14 
115 



921 



17 

918 

?r 

922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 



C/X 
Pll 

002700; 

002706- 
002710- 
002712* 



002730* 
002734- 
002742* 
002750' 
002753- 
002766- 
002761* 
002766- 
002767- 
002774- 
003000- 
003 001 ' 
003006- 
003013- 
003020- 

im& 

003040' 
003043- 
003050* 
003056- 

883817= 

003065' 
003072- 
003100- 
003106- 
003110* 
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003057* 
002722* 



040445 
047440 
047101 
020073 
040526 
020075 

IU 

120 
000 
116 
036440 

8E8 

051514 
062 
051514 

040 
040526 
020075 

0475^2 
000 



mm 

000040 

000 
051515 



044517 
000040 

032456 
024502 

mm 



051514 
046511 
000040 
000 

003112* 
003112- 000100 



003312* 
003320* 
003322* 
003330- 
003332* 
003340* 



000003 
000000 
000003 
000000 
000003 
000000 
000001 



000 
051122 



mm 

818i8i 

000040 
020113 
042523 

020060 
000 

020 888 

mm 

mm 



054056 020130 
020102 046050 
052111 036440 
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P4 
P13 
P15 
P2 

CHANN+4 
-1 


; RMS 

; WRAPAROUND 
; ERROR 
? ON CHAN 

} (CHAN NUMBER 2 DIGITS) 
; MESSAGE TERMINATOR. 


PI.' 


.ASCIZ 
. ASCIZ 


*%A/D * 

* ON CHAN * 


P3: 


. ASCIZ 


OLD VALUE = * 


P4: 
P5: 


. ASCIZ 
• BYTE 
-ASCIZ 


*RMS * 
-PEAK * 


P6: 


. ASCIZ 


* NOISE = * 


P7: 


-BYTE 
.ASCIZ 


*0.50 LSB ) * 


P8: 


.ASCIZ 


'2.00 LSB) * 


P9: 


. ASCIZ 


* NEW VALUE = * 


P13: 


. ASCIZ 


'WRAPAROUND ' 


P15: 


.ASCIZ* 


ERROR * 


value: 


.ASCIZ 
. BYTE 


*X.XX LSB (LIMIT = * 


RECSAM! 


. EVEN 
. BLKW 


64. ;USED TO STORE A/D RESULTS ON UP TO 64. CHANS. 


OLDS: 

news: 

CHANN: 


-BLICW 

• WORD 
. BLKW 
. WORD 
. BLKW 
.WORD 

• END 


3 JUSED FOR STORE OF ASCII OF OLD SAMPLE VALUE. 


3 ;USED FOR STORE OF ASCIT NEW SAMPLE VALUE. 


3 ;USED FOR STORAGE OF ASCIT OF CHAN. NUMBER. 
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ABR 

ACSR 

ADBR 

A DDR 

ADDR22= 

ADPK1 

ADRMS1 

ADSR 

APKLIM 

APKX 
ARMLIM 

ARMX 

ASB 

ASR 

ASTAT 

AVER 

AWAS 

8EGTN 



BIT 
BITO 



000240R 
000102R 
000234R 

mnb 

001316R 
001154R 
000232R 

000262R 

S88||8g 

000 2b 4 R 
000106R 
00Q236R 



llll? i 111 



001766R 
000001 



BIT13 = 
BTT14 = 
BIT15 = 
BTT2 = 
BIT3 = 
BTT4 = 
BIT5 = 
BIT6 = 
BTT7 = 
BIT8 = 
BIT9 = 
BREAKS= 
BR1 
BR2 

BTOD$ s 
CCH 

CDATAS= 

CHANN 

CLSTCH 

CONFIG 

CCJNV 

CSRA 

DAC 

DATCKS= 

D ATER$= 

DECTM 

DVID1 

ECOM 

EDGE 



040000 
100000 
000004 
000010 
000020 
000040 
000100 

088I88 

001000 

104407 

000012R 

000013R 

104421 

000266R 

104412 

003332R 

000224R 

000056R 

002004R 

0001Q0R 

000234R 

104411 

000014R 
002240R 
000250R 



381* 
443* 
377* 
374 



620 
375* 
549* 
399 



nr. 



694 
736 
423 
628 



769 
768 
613 



468 
516 



421 

556 

387 
509* 

842 
537 

731 

442* 

569 



799 
566* 



467* 

487* 
453 



III. 

601 



399 
514 



852 
632 



486* 
594 



393 
727 



718* 
827* 
507 



Hi 

750 



833 
530 



861 
826* 



442 
640 



443 
712* 



534* 535 
874 880 



719* 746* 775* 



481* 716* 720* 



ffl m m 

785 788 833 

712 772 775 



537 
892 



483 486 487 

782* 826 827 



til Ui 

842 



630* 
935» 
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EENOP 

ENDTTS= 

ENDP 

ESDS = 

ERCOM 

ERINT 

ERRTYP 

EXIT$ 

FRED 

GETPAS 

GMBUFS: 

HRDCNT 

HRDERS 

HRDPAS 

ICONT 

ICOUNT 

IDNUM 

INI? 

INTFLG 

INTR 



LOGS 

MAP22S= 

MODNAM 

MODSP 

MSGNS = 

MSGS$ = 

MSGS = 

MSG1 

MSG11 

MSG 12 

MSG13 

MSG5 

NCCfl 

NEWS 

NLSTCH 

NULL = 

NUMBAl 

NCIMBA2 

NUMB A3 

OPFALL 

OLDS 

OPEN = 

OTOAS = 

PASCN? 

PASSCN 

pSps? = 

POPSP2= 
PRTY = 
PRTYO = 
PRTYi = 



001744R 

104413 

001444R 

mm, 

002324R 

000106R 

104400 

000246R 

104415 

J800J4R 

104405 

000050R 

000036R 

000040R 

000122R 

000030R 

000244R 

000120R 

000452R 

000456R 

000502R 

000616R 

000750R 

OOOOOOR 

mm* 



002576R 
002636R 

mm 

002616R 
000264R 
003322R 



mm 



000272R 
000274R 
000276R 



000230R 
003312R 
000000 

104420 
000034R 

mm* 
mm 

000000 

0000Q0 
000040 



633 
694 

Hi* 

603 

445* 

518 

571 

758* 
447 



432* 
371* 

432* 



ill* 



851# 
869" 

m 

860 

382* 

884 

535 

447 

im 

683 
662 
882 
289 
320 
668 
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693f 



747 


826* 




488* 

641 

574 


580* 

722 

596 


605^ 
785 
599 


490 


582 


607 


440 


454* 




504# 






609 


688 


754 


561 
933# 

m 


564 


589 


582 


607 


931# 
290 
322 
676 


291 

m 


292 

m 


ar 


m 


788 



703* 704 734* 



750 



309 
326 



625* 842 



311 312 

33lf 
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SEQ 0022 



3311 
331# 



003057R 
002722R 
002734R 
002753R 

mnn 



869 

IIS* 

873 
901* 

tut 

394* 
404* 

8t0ff 



919» 
879 



857 
866 



887 
891 



908# 

910# 



895# 
896# 



658 
549f 



672 
696 



2472R 
2474R 



718 

813* 

814 

573 



781 

815* 

817* 



810* 
817 

818* 



m 



464 



Ml 



514* 
837* 



515* 
838* 



516* 

856 



517 

865 



561* 
922# 
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VECTOR 

MAINT 

HASADR 

WDFR 

MDTO 

WHO 

WRPERR 
XFLAG 



000104H 

smm 

000242R 

mm 

003342H 



319» 



mi 

567* 
740 

928S 
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592* 
746t 



000000 
003342 



000 
001 



ERRORS DETECTED: 

DEFAULT GLOB ALS GENERATED: 

XApBB0g-XAD|BJ/SJL|CRF:SYM=DDXCOH # XADBB0 

rUn-time* ratio: ie5sS§I?4 

CORE USED: 7K (13 PAGES) 



